home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 21 / Cream of the Crop 21 (Terry Blount) (October 1996).iso / editor / auror300.zip / CFGSORT.AML < prev    next >
Text File  |  1996-07-17  |  926b  |  38 lines
  1. //--------------------------------------------------------------------
  2. // The Aurora Editor v3.0, Copyright (C) 1993-1996 nuText Systems
  3. //
  4. // CFGSORT.AML
  5. // Configuration for Sort Options
  6. //--------------------------------------------------------------------
  7.  
  8. include bootpath "define.aml"
  9.  
  10. variable sortorder, sortcase
  11.  
  12. // create dialog box
  13. dialog "Sort Options" 38  9 "cp"
  14.  
  15. // sort order group box
  16. groupbox 'Sort Order:' 3 2
  17.   (menu ''
  18.      item " ( ) &Ascending"
  19.      item " ( ) &Descending       "
  20.    end) '' _SortOpt 'ad'
  21.  
  22. // case options group box
  23. groupbox 'Sort Case:' 3 6
  24.   (menu ''
  25.      item " ( ) &Case Sensitive"
  26.      item " ( ) Case &Insensitive "
  27.    end) '' _SortOpt 'ci'
  28.  
  29. // ok/cancel buttons
  30. button "O&k"    28  3 8
  31. button "Cancel" 28  5 8
  32.  
  33. // display dialogbox
  34. if (getdialog ref sortorder ref sortcase) == "Ok" then
  35.   prf.SortOpt  = sortorder + sortcase
  36.   return TRUE
  37. end
  38.